USE VALERI_Odysseus

DECLARE @Cmd VARCHAR(1000)
DECLARE @User VARCHAR(25)

SET @User = 'VALERIUser'

DECLARE [tables_curs] CURSOR FOR
    SELECT  'GRANT EXECUTE ON ' + [Name] + ' TO ' + @User
    FROM    [SysObjects]
    WHERE   [Xtype] = 'P'
    AND [Name] LIKE 'usp%'

OPEN [tables_curs]
    FETCH NEXT FROM [tables_curs] INTO @cmd
    WHILE @@FETCH_STATUS = 0
    BEGIN
        EXEC (@cmd)
        FETCH NEXT FROM [tables_curs] INTO @cmd
    END

CLOSE tables_curs
DEALLOCATE tables_curs